home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
8bitfiles.net/archives
/
archives.tar
/
archives
/
commodore-users-of-norman
/
CUON_07_(08-1984).d64
/
sprite boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2019-04-13
|
759b
|
22 lines
10 REM
15 REM SPRITE EDITOR BOOT
20 REM
25 PRINT "[147]":POKE 53280,14:POKE 53281,6
30 PRINT"LOADING ...":GOSUB 100
40 PRINT "LOAD"CHR$(34)" SCROLL.DATA"CHR$(34)",8,1"
41 PRINT "NEW"
42 PRINT "LOAD"CHR$(34)" SPRITE EDITOR"CHR$(34)",8"
50 POKE 198,10
55 DATA 19,13,13,13,32,32,82,85,78,13
60 FOR I=1 TO 10:READ X:POKE 630+I,X:NEXT
70 POKE 44,64:POKE 16*1024,0:POKE 56,126:CLR:NEW
100 PRINT" [146] [146] [146] [146] [146] [146]
110 [153]" WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT
120 PRINT" [183][183][183] [146] [146][183][183][183] [146][183][183][181] [146] [146] [146][183]
130 [153]" USRUSRUSRUSR USR USR COS USR USR USRUSRUSRUSR
140 PRINT" [146] [146] [146] [146] [146] [146]
150 [153]" WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT
160 PRINT" [146][183] [146] [146] [146] [146] [146] [146] [146][183][183][181]
170 [153]" USRUSRUSRUSR USRUSRUSRUSR USR USR USRUSRUSRUSR USR COS
180 RETURN